home *** CD-ROM | disk | FTP | other *** search
- ############################################################# -*- c -*-
- ## generic include for XXX. Do not use directly.
- ##
- ## $Id: generic-get-char.m2i 12011 2005-03-18 23:01:44Z rstory $
- ########################################################################
- @if $m2c_mark_boundary == 1@
- /** START code generated by $RCSfile$ $Revision: 12011 $ */
- @end@
- ########################################################################
- ##
- ## enums first
- @if $m2c_node_skip_mapping == -1@
- @ eval $m2c_node_skip_mapping = 1@
- @end@
- @if ($node.enums == 1) && ("$node.perltype" eq "BITS")@
- /*
- * TODO:242:o: update or replace BITS tests (get).
- * If $node data is stored in SNMP BIT order, individual
- * bit tests are redundant, and you can do a straight copy. If not, then
- * update each if condition to test the correct bit.
- *
- * NOTE WELL: setting bit '0' for:
- * C 0x0000001
- * SNMP 0x8000000
- *
- @ if $m2c_node_skip_mapping != 1@
- * define correct bit to test for all INTERNAL_* defines in the
- * ${context} enum or contants header file.
- */
- $example_start
- $m2c_node_lh = 0;
- @ foreach $e $v enum@
- @ include m2c_setup_enum.m2i@
- if ($m2c_ctx_rh & INTERNAL_$context.uc_$m2c_iname) {
- $m2c_node_lh |= $m2c_ename;
- }
- @ end@ # for each
- $example_end
- @ else@
- * assuming generated code keeps $node BITS in SNMP order.
- */
- $m2c_node_lh = @m2c_ctx_rh;
- @ end@
- @end@
- ##
- ########################################################################
- @if $m2c_mark_boundary == 1@
- /** END code generated by $RCSfile$ $Revision: 12011 $ */
- @end@
-